object BuscarCategorias: TBuscarCategorias
  Left = 0
  Top = 0
  BorderIcons = [biSystemMenu]
  Caption = 'BuscarCategorias'
  ClientHeight = 479
  ClientWidth = 421
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object pnlFiltros: TPanel
    Left = 0
    Top = 0
    Width = 421
    Height = 217
    Align = alTop
    TabOrder = 0
    object pnlTitulo: TPanel
      Left = 1
      Top = 1
      Width = 419
      Height = 23
      Align = alTop
      Color = clSkyBlue
      ParentBackground = False
      TabOrder = 0
      object lblTitulo: TLabel
        Left = 1
        Top = 1
        Width = 417
        Height = 21
        Align = alClient
        Alignment = taCenter
        Caption = 'Buscar CATEGORIAS'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -16
        Font.Name = 'Century Gothic'
        Font.Style = []
        ParentFont = False
        ExplicitWidth = 162
      end
    end
    object rgFiltros: TRadioGroup
      Left = 16
      Top = 38
      Width = 185
      Height = 105
      Caption = ' Buscar por: '
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Century Gothic'
      Font.Style = []
      ItemIndex = 0
      Items.Strings = (
        'Codigo'
        'Nombre ')
      ParentFont = False
      TabOrder = 1
      TabStop = True
      OnClick = rgFiltrosClick
    end
    object dbBusqueda: TEdit
      Left = 16
      Top = 149
      Width = 377
      Height = 25
      CharCase = ecUpperCase
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Century Gothic'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
    object rgFiltrosLike: TRadioGroup
      Left = 16
      Top = 176
      Width = 377
      Height = 35
      Columns = 2
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Century Gothic'
      Font.Style = []
      Items.Strings = (
        'Que comience con'
        'Que contenga')
      ParentFont = False
      TabOrder = 3
      TabStop = True
    end
  end
  object btnBuscar: TBitBtn
    Left = 0
    Top = 217
    Width = 421
    Height = 34
    Align = alTop
    Caption = '&Buscar'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Century Gothic'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = btnBuscarClick
  end
  object dbgBusqueda: TDBGrid
    Left = 0
    Top = 251
    Width = 421
    Height = 228
    Align = alClient
    DataSource = dsTuristikBusqueda
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnDblClick = dbgBusquedaDblClick
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'ID_CATEGORIA'
        Title.Alignment = taCenter
        Title.Caption = 'CODIGO'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NOMBRE_CATEGORIA'
        Title.Caption = 'NOMBRE CATEGORIA'
        Width = 330
        Visible = True
      end>
  end
  object Retorno: TEdit
    Left = 272
    Top = 304
    Width = 121
    Height = 21
    TabStop = False
    TabOrder = 3
    Visible = False
  end
  object Where: TEdit
    Left = 272
    Top = 331
    Width = 121
    Height = 21
    TabStop = False
    TabOrder = 4
    Visible = False
  end
  object qryTuristikBusqueda: TUniQuery
    Connection = DMTuristik.DBTuristik
    SQL.Strings = (
      'select  A.*'
      'from CATEGORIA A'
      'where A.ID_CATEGORIA = 0'
      'order by A.ID_CATEGORIA')
    Left = 152
    Top = 296
    object qryTuristikBusquedaID_CATEGORIA: TIntegerField
      FieldName = 'ID_CATEGORIA'
    end
    object qryTuristikBusquedaNOMBRE_CATEGORIA: TStringField
      FieldName = 'NOMBRE_CATEGORIA'
      Size = 100
    end
    object qryTuristikBusquedaESTADO_REGISTRO: TStringField
      FieldName = 'ESTADO_REGISTRO'
      Size = 1
    end
    object qryTuristikBusquedaOPERADOR: TStringField
      FieldName = 'OPERADOR'
      Size = 10
    end
    object qryTuristikBusquedaFECHA_CARGA: TDateField
      FieldName = 'FECHA_CARGA'
    end
  end
  object dsTuristikBusqueda: TUniDataSource
    DataSet = qryTuristikBusqueda
    Left = 200
    Top = 296
  end
end
